home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 September / CHIP Eylül 1998.iso / freeware / CDEVE00.EXE / Cdeve00 / DBTMsg.pas < prev    next >
Pascal/Delphi Source File  |  1998-01-20  |  3KB  |  85 lines

  1.  
  2. {*******************************************************}
  3. {                                                       }
  4. {       Delphi Runtime Library                          }
  5. {                                                       }
  6. {       Partial translation of DBT.H                    }
  7. {                                                       }
  8. {       version : 4.00                                  }
  9. {       Date : 24 May 1993                              }
  10. {       Copyright (c) 1993-1996 Microsoft Corporation   }
  11. {                                                       }
  12. {       Equates for WM_DEVICECHANGE                     }
  13. {                                                       }
  14. {       Copyright (p) 1998 ZifNab (T. Deprez            }
  15. {                                                       }
  16. {*******************************************************}
  17.  
  18. {*******************************************************}
  19. { [History :]                                           }
  20. {   18-01-1988 first release                            }
  21. {                                                       }
  22. { [FUTURE :]                                            }
  23. {   - further translation of DBT.H                      }
  24. {                                                       }
  25. {*******************************************************}
  26.  
  27. unit DBTMsg;
  28.  
  29. interface
  30. uses windows;
  31.  
  32. const
  33.  (* Events of WM_DEVICECHANGE (wParam) *)
  34.  
  35.   DBT_DEVICEARRIVAL = $8000;            (* system detected a new device *)
  36.   DBT_DEVICEQUERYREMOVE = $8001;        (* wants to remove, may fail *)
  37.   DBT_DEVICEQUERYREMOVEFAILED = $8002;  (* removal aborted *)
  38.   DBT_DEVICEREMOVEPENDING = $8003;      (* about to remove, still avail *)
  39.   DBT_DEVICEREMOVECOMPLETE = $8004;     (* device is gone *)
  40.   DBT_DEVICETYPESPECIFIC = $8005;       (* type specific event *)
  41.   DBT_CONFIGCHANGED = $0018;
  42.  
  43.  (* type of device in DEV_BROADCAST_HDR *)
  44.   DBT_DEVTYP_OEM = $00000000;           (* OEM- or IHV-defined *)
  45.   DBT_DEVTYP_DEVNODE = $00000001;       (* Devnode number *)
  46.   DBT_DEVTYP_VOLUME = $00000002;        (* Logical volume *)
  47.   DBT_DEVTYP_PORT = $00000003;          (* Port (serial or parallel *)
  48.   DBT_DEVTYP_NET = $00000004;           (* Network resource *)
  49.  
  50.   (* media types in DBT_DEVTYP_VOLUME *)
  51.   DBTF_MEDIA = $0001;
  52.   DBTF_NET = $0002;                     (* logical volume is network volume *)
  53.  
  54. type
  55.  
  56.  (* window structures *)
  57.  
  58.  PDEV_BROADCAST_HDR = ^TDEV_BROADCAST_HDR;
  59.  TDEV_BROADCAST_HDR = packed record
  60.    dbch_size : DWORD;
  61.    dbch_devicetype : DWORD;
  62.    dbch_reserved : DWORD;
  63.   end;
  64.  
  65.   PDEV_BROADCAST_VOLUME = ^TDEV_BROADCAST_VOLUME;
  66.   TDEV_BROADCAST_VOLUME = packed record
  67.    dbcv_size : DWORD;
  68.    dbcv_devicetype : DWORD;
  69.    dbcv_reserved : DWORD;
  70.    dbcv_unitmask : DWORD;
  71.    dbcv_flags : WORD;
  72.   end;
  73.  
  74.   TWMDeviceChange = record
  75.    Msg : Cardinal;
  76.    Event : UINT;
  77.    dwData : Pointer;
  78.    Result : LongInt;
  79.   end;
  80.  
  81.  
  82. implementation
  83.  
  84. end.
  85.